Pole o nezname velikosti

Otázka od: Aleš Kresta

18. 10. 2002 19:58

Dobry den,
     potřeboval bych vytvořit pole integru, ale je problem, ze velikost
tohoto pole zjistim az pri behu programu. Da se tedy za běhu vytvorit pole o
zjistene velikosti???
      Predem diky za odpoved

Odpovedá: Petr Vones

18. 10. 2002 18:48

From: "Aleš Kresta" <kresta.ales@seznam.cz>
> potřeboval bych vytvořit pole integru, ale je problem, ze velikost
> tohoto pole zjistim az pri behu programu. Da se tedy za běhu vytvorit pole o
> zjistene velikosti???

Ano, pouzitim dynamickych poli:

var
  MyArray: array of Integer;

SetLength(MyArray, 1000);
MyArray[0] := 12345;
...
MyArray[999] := 12345;

Dynamicka pole se indexuji vzdy od nuly, dale viz 'dynamic arrays' v helpu.

Petr Vones

Odpovedá: Pavel Malinsky

19. 10. 2002 19:32

> -----Original Message-----
> From: delphi-l-owner@clexpert.cz [mailto:delphi-l-owner@clexpert.cz]On
> Behalf Of Aleš Kresta
> Subject: Pole o nezname velikosti
>
> Dobry den,

  Ahoj,

> potřeboval bych vytvořit pole integru, ale je problem, ze velikost
> tohoto pole zjistim az pri behu programu. Da se tedy za běhu
> vytvorit pole o
> zjistene velikosti???

  Da. Rika se tomu dynamicke pole.

var
  ArrI: array of Integer;
  X: Integer;

a az budes znat velikost tak staci SetLenght(ArrI, NejakaVelikost)
a prochazet jej pomoci napr.:

   for X:= 0 to High(ArrI) do ArrI[X] atd...

          S pozdravem a dikem
=====================================
> Pavel Malinsky; spiderland@iol.cz <
=====================================
GSM: 602 652 203